<script>On MouseUpVisual effect wipe rightGo to previous cardEnd MouseUp</script>
</part>
<part>
<id>2</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>463</left>
<top>223</top>
<right>506</right>
<bottom>256</bottom>
</rect>
<style>rectangle</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>26425</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Go Next</name>
<script>On MouseUpVisual effect wipe leftGo to next cardEnd MouseUp</script>
</part>
<part>
<id>3</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <true /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>97</left>
<top>22</top>
<right>268</right>
<bottom>40</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>10</textSize>
<textStyle>bold</textStyle>
<textHeight>13</textHeight>
<name>Name</name>
<script></script>
</part>
<part>
<id>4</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <true /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <true /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>8</left>
<top>22</top>
<right>92</right>
<bottom>40</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name></name>
<script></script>
</part>
<part>
<id>5</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>79</left>
<top>61</top>
<right>506</right>
<bottom>213</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>10</textSize>
<textStyle>plain</textStyle>
<textHeight>13</textHeight>
<name>Description</name>
<script>On MouseUpGet the value of the ClickChunkFind whole it in background field "Name"End MouseUp</script>
</part>
<content>
<layer>background</layer>
<id>4</id>
<text>Data Type:</text>
</content>
<name>Data Types</name>
<script>---- Utility routines--On UnlockFieldsRepeat with i = 1 to the number of background fieldsSet LockText of background field i to falseEnd RepeatEnd UnlockFieldsOn LockFieldsRepeat with i = 1 to the number of background fieldsSet LockText of background field i to trueEnd RepeatEnd LockFieldsOn SortCardsIf the LockText of background field "Name" thenAnswer "Unlock fields first."Exit SortCardsEnd IfPush this cardSort this background by field "Name"Pop cardEnd SortCardsOn DeleteAllCardsIf the LockText of background field "Name" thenAnswer "Unlock fields first."Exit DeleteAllCardsEnd IfAnswer "Really delete all cards?" with "Do It" or "IΓÇÖm a Teapot"If it is not "Do It" thenExit DeleteAllCardsEnd IfGo to first card of this backgroundPut 0 into CardsDeletedRepeat with i = 1 to the number of cards in this background - 1Set cursor to busyDoMenu "Delete Card"Add 1 to CardsDeletedIf CardsDeleted = 100 thenDoMenu "Compact Stack"Put 0 into CardsDeletedEnd IfEnd RepeatRepeat with i = 1 to the number of background fieldsIf not the LockText of background field i thenPut empty into background field iEnd IfEnd RepeatIf CardsDeleted Γëá 0 thenDoMenu "Compact Stack"End IfEnd DeleteAllCards</script>
